;;QQ:67762207
[@FREDID_1]
{
#IF
check [588] 1
#SAY
ϲ귩½,ͬʱҲӵ˲Ӧ츳!\
<ʹòӦ츳/@츳>\
#ELSESAY
δ벿,޷ӵвӦ츳?!\
<˳/@Exit>

[@츳]
#ACT
LOADVALUE D0 "QuestDiary\winma\Tribeinduction\FDLIST.txt" %username ܺ
MOV A5 ""
GOTO @HYCYCLIST

[@HYCYCLIST]
#IF
LARGE D0 0
#ACT
LOADVALUE A0 "QuestDiary\winma\Tribeinduction\FDLIST.txt" %username %D0
LOADVALUE D1 "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %A0 %USERNAME 
GOTO @YSFRID
#ELSEACT
goto @FREDDIY

[@YSFRID]
#IF
EQUAL D1 1
#ACT
ADDSTR A5 "<[:"
ADDSTR A5 %A0
ADDSTR A5 "]/@б("
ADDSTR A5 %D0 
ADDSTR A5 ")> <[޸]/@@޸ĺ("
ADDSTR A5 %D0
ADDSTR A5 ")> <[봫]/@봫( 
ADDSTR A5 %D0
ADDSTR A5 ")> {FCOLOR/10}״̬:{FCOLOR/12}{FCOLOR/13}{FCOLOR/12}\"
DEC D0 1
GOTO @HYCYCLIST
BREAK
#IF
EQUAL D1 2
#ACT
ADDSTR A5 "<[:"
ADDSTR A5 %A0
ADDSTR A5 "]/@б("
ADDSTR A5 %D0 
ADDSTR A5 ")> <[޸]/@@޸ĺ("
ADDSTR A5 %D0
ADDSTR A5 ")> <[봫]/@봫( 
ADDSTR A5 %D0
ADDSTR A5 ")> {FCOLOR/10}״̬:{FCOLOR/12}{FCOLOR/1}ܾ{FCOLOR/12}\"
DEC D0 1
GOTO @HYCYCLIST
BREAK
#ELSEACT
ADDSTR A5 "<[:"
ADDSTR A5 %A0
ADDSTR A5 "]/@б("
ADDSTR A5 %D0 
ADDSTR A5 ")> <[޸]/@@޸ĺ("
ADDSTR A5 %D0
ADDSTR A5 ")> <[봫]/@봫( 
ADDSTR A5 %D0
ADDSTR A5 ")> {FCOLOR/10}״̬:{FCOLOR/12}\"
DEC D0 1
GOTO @HYCYCLIST
BREAK

[@FREDDIY]
#ACT
Loadvalue D6 "QuestDiary\winma\Tribeinduction\FDLIST\.txt"  бƶĻ
Loadvalue D1 "QuestDiary\winma\Tribeinduction\FDLIST\.txt"  б
Loadvalue D2 "QuestDiary\winma\Tribeinduction\FDLIST\.txt"  бû
Loadvalue D3 "QuestDiary\winma\Tribeinduction\FDLIST\.txt"  бû
LOADVALUE A2 "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %USERNAME 

#IF
EQUAL A2 ""
#SAY
<[Ӧ˵]/@б˵>\
Ŀǰ{FCOLOR/10}<$USERJF>{FCOLOR/12}.\
{FCOLOR/1}ע:Ա,ʹøùܷԸ!{FCOLOR/12}\
<[ӲӦԱ]/@>\
<$OUTPUT(A5)>
</@б(1)></@б(2)></@б(3)></@б(4)></@б(5)></@б(6)></@б(7)></@б(8)></@б(9)></@б(10)></@б(11)></@б(12)></@б(13)></@б(14)></@б(15)></@б(16)></@б(17)></@б(18)></@б(19)></@б(20)>
</@@޸ĺ(1)></@@޸ĺ(2)></@@޸ĺ(3)></@@޸ĺ(4)></@@޸ĺ(5)></@@޸ĺ(6)></@@޸ĺ(7)></@@޸ĺ(8)></@@޸ĺ(9)></@@޸ĺ(10)></@@޸ĺ(11)></@@޸ĺ(12)></@@޸ĺ(13)></@@޸ĺ(14)></@@޸ĺ(15)></@@޸ĺ(16)></@@޸ĺ(17)></@@޸ĺ(18)></@@޸ĺ(19)></@@޸ĺ(20)></@봫(1)></@봫(2)></@봫(3)></@봫(4)></@봫(5)></@봫(6)></@봫(7)></@봫(8)></@봫(9)></@봫(10)></@봫(11)></@봫(12)></@봫(13)></@봫(14)></@봫(15)></@봫(16)></@봫(17)></@봫(18)></@봫(19)></@봫(20)>
#ELSEACT
MOV A3 "{FCOLOR/10}:{FCOLOR/12}{FCOLOR/11}"
ADDSTR A3 %A2
ADDSTR A3 "{FCOLOR/12} <[ ]/@> <[ ]/@ܾ>"
GOTO @ANOTHER

[@ANOTHER]
#IF
#SAY
<[Ӧб˵]/@б˵>\
Ŀǰ{FCOLOR/10}<$USERJF>{FCOLOR/12}.\
{FCOLOR/1}ע:˲Ա,ʹøùܷԸ!{FCOLOR/12}\
<[ӲӦԱ]/@>\
<$OUTPUT(A3)>\
<$OUTPUT(A5)>\
</@б(1)></@б(2)></@б(3)></@б(4)></@б(5)></@б(6)></@б(7)></@б(8)></@б(9)></@б(10)></@б(11)></@б(12)></@б(13)></@б(14)></@б(15)></@б(16)></@б(17)></@б(18)></@б(19)></@б(20)></@@޸ĺ(1)></@@޸ĺ(2)></@@޸ĺ(3)></@@޸ĺ(4)></@@޸ĺ(5)></@@޸ĺ(6)></@@޸ĺ(7)></@@޸ĺ(8)></@@޸ĺ(9)></@@޸ĺ(10)></@@޸ĺ(11)></@@޸ĺ(12)></@@޸ĺ(13)></@@޸ĺ(14)></@@޸ĺ(15)></@@޸ĺ(16)></@@޸ĺ(17)></@@޸ĺ(18)></@@޸ĺ(19)></@@޸ĺ(20)></@></@ܾ></@봫(1)></@봫(2)></@봫(3)></@봫(4)></@봫(5)></@봫(6)></@봫(7)></@봫(8)></@봫(9)></@봫(10)></@봫(11)></@봫(12)></@봫(13)></@봫(14)></@봫(15)></@봫(16)></@봫(17)></@봫(18)></@봫(19)></@봫(20)>

[@]
#ACT
LOADVALUE D0 "QuestDiary\winma\Tribeinduction\FDLIST.txt" %username ܺ

#IF
     checkcmd CHECKUSERJF  %D2
ELARGE D3 %D0
#SAY
ĿǰĻ{FCOLOR/10}<$USERJF>{FCOLOR/12}\
<ҪĲӦԱ/@@inputuname>
#ELSESAY
Ļֲ  ĲӦ!\


[@@inputuname]
#ACT
MOV A6 %INPUTSTR
FormatStr "FLD_CHARACTER='%s'" %A6
ReadValueSql "TBL_CHARACTER" %A9 "FLD_CHARACTER" @existA2

[@existA2()]
#ACT
MOV A1 %ARG(1)
#IF
equal A1 %USERNAME
#ACT
SYSMSG "Բ,ܼԼΪ!"
BREAK
#IF
EQUAL A1 ""
#ACT
SYSMSG "Ϣ~~"
BREAK
#ELSEACT
GOTO @¼

[@¼]
#ACT
INC D0 1 
   actcmd SETUSERJF   - %D2
SAVEVALUE "QuestDiary\winma\Tribeinduction\FDLIST.txt" %username %D0 %A6
SAVEVALUE "QuestDiary\winma\Tribeinduction\FDLIST.txt" %username ܺ %D0
DELAYGOTO [LOCAL] 3 @FREDID_1
#SAY
ݴ....

[@봫()]
#ACT
MOV D8 %ARG(1)
LOADVALUE A6 "QuestDiary\winma\Tribeinduction\FDLIST.txt" %username %D8
LOADVALUE A4 "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %A6 
#IF
EQUAL A4 "" 
#ACT
SAVEVALUE "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %A6  %username
SAVEVALUE "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %A6 %username 0
#SAY
,ȴһӦ,ܺ,ʹô͹\
<[]/@FREDID_1>
#ELSESAY
Բ,ʹøù,Ժʹ\
<[]/@FREDID_1>
 
[@]
#ACT
LOADVALUE A2 "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %USERNAME 
MOV A7 %USERMAP
#IF
!checkcmd CHECKMAPFLAG KSNOMOVE 
#ACT
SAVEVALUE "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %USERNAME %A2 1
SAVEVALUE "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %USERNAME ͼ %A7 
SAVEVALUE "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %USERNAME X %USERX
SAVEVALUE "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %USERNAME Y %USERY
#SAY
붺ڴ˵ȴĺһ...\\\
{FCOLOR/1}˽,...Ϲ{FCOLOR/12}
#ELSEACT
SYSMSG "Բ,õֹ,޷ӦκϢ!"
BREAK


[@ܾ]
#ACT
LOADVALUE A2 "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %USERNAME 
SAVEVALUE "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %USERNAME %A2 2
MOV A2 ""
SAVEVALUE "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %USERNAME  %A2
#SAY
ѡ˾ܾ,ܾɹ,òԱ\
<[]/@FREDID_1>


[@@޸ĺ()]
#ACT
MOV A6 %INPUTSTR
MOV D0 %ARG(1)
GOTO @ַ1

[@ַ1]
#IF
     checkcmd CHECKUSERJF  %D1
#ACT
FormatStr "FLD_CHARACTER='%s'" %A6
ReadValueSql "TBL_CHARACTER" %A9 "FLD_CHARACTER" @existA3
#ELSESAY
Բ,Ļֲ!

[@existA3()]
#ACT
MOV A1 %ARG(1)
#IF
EQUAL A1 ""
#ACT
SYSMSG "ϢΪ!"
BREAK
#IF
EQUAL A1 %USERNAME
#ACT
SYSMSG "޸ԼΪӦԱ"
BREAK
#ELSEACT
GOTO @SERDXT43

[@SERDXT43]
#ACT
   actcmd SETUSERJF   - %D1
SAVEVALUE "QuestDiary\winma\Tribeinduction\FDLIST.txt" %username %D0 %A6
SYSMSG "޸ĳɹ"
DELAYGOTO [LOCAL] 3 @FREDID_1
#SAY
ݴ...

[@б˵]
#SAY
{FCOLOR/10}Ӧʹ˵:{FCOLOR/12}беĲӦԱ,ƶбвԱ,ǰǸòԱ,ͨ,벿Աһʱʹƶ,ƶòԱ,ĵص͸ƫ!ͬʱĲԱ,ԭԵƬ!\
{FCOLOR/1}ע:{FCOLOR/12}ֵͼʹ~ù,벿Ա޷ܸù\
һԱҪ{FCOLOR/1}<$OUTPUT(D2)>{FCOLOR/12},ÿθĶҪ{FCOLOR/1}<$OUTPUT(D1)>{FCOLOR/12},ÿƶ{FCOLOR/1}<$OUTPUT(D6)>{FCOLOR/12},ÿԱӵ{FCOLOR/1}<$OUTPUT(D3)>{FCOLOR/12}Ա\
<[]/@FREDID_1>

[@б()]
#ACT
MOV D8 %ARG(1)
LOADVALUE A6 "QuestDiary\winma\Tribeinduction\FDLIST.txt" %username %D8
LOADVALUE D1 "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %A6 %USERNAME
#IF
EQUAL D1 1
#ACT
GOTO @JIFENKKF
#ELSESAY
ûоöԷͬ,޷!\
<[]/@FREDID_1>

[@JIFENKKF]
#IF
   checkcmd CHECKUSERJF    %D6
#ACT
   actcmd SETUSERJF   - %D6 
SAVEVALUE "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %A6 %USERNAME 0
MOV A2 ""
SAVEVALUE "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %A6  %A2
LOADVALUE A3 "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %A6 ͼ
LOADVALUE A4 "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %A6 X
LOADVALUE A5 "QuestDiary\winma\Tribeinduction\FDLIST\.txt" %A6 Y
MAPMOVE %A3 %A4 %A5
SYSMSG "<$OUTPUT(D6)>"
CLOSE
BREAK
#ELSEACT
SYSMSG "ֲ"
}
;;QQ:67762207

